extern int sger_(integer *m, integer *n, real *alpha, real *x, integer *incx, real *y, integer *incy, real *a, integer *lda);
/*:ref: xerbla_ 14 3 13 4 124 */
